Voorbeeld van de instructie AppActivate

Dit voorbeeld laat zien hoe de instructie AppActivate op verschillende manieren kan worden gebruikt om een toepassingsvenster te activeren. De instructies Shell gaan ervan uit dat de toepassingen zich in de opgegeven paden bevinden. Op de Macintosh is "HD" de standaardstationsnaam en worden delen van de padnaam gescheiden door dubbele punten en niet door schuine strepen.

Dim MyAppID, ReturnValue
AppActivate "Microsoft Word"    ' Activeert Microsoft
    ' Word.

' AppActivate kan ook de resultaatwaarde van de functie Shell gebruiken.
MyAppID = Shell("C:\WORD\WINWORD.EXE", 1)    ' Start Microsoft Word.
AppActivate MyAppID    ' Activeert Microsoft
    ' Word.



' U kunt ook de resultaatwaarde van de functie Shell gebruiken.
ReturnValue = Shell("c:\EXCEL\EXCEL.EXE",1)    ' Start Microsoft Excel.
AppActivate ReturnValue    ' Activeert Microsoft
    ' Excel.